function ssvep8(VS)
OpenWindow(VS)
GenFlickCode(VS)
PrepareStim(VS)
VS.FrameCounter=0;
VS.EstimatedStimulusOnsetTime=[];
VS.iRound=0;
for iRound=1:VS.MaxRound
    if VS.Escape==true;
        break
    end
    VS.iRound=VS.iRound+1;
    FlickPhase(VS)
    RestPhase(1,VS)
end
VS.Escape=false;
Screen('CloseAll')
sca